(DE XX NIL (PROG NIL (PUTSYM PNAME T NIL CONS NCONS NUMVAL FIX1A) (LOAD T] (DE YY NIL (PROG NIL (GETSYM SUBR WINOPN WINLBL WINREL WINCLR WINOUT WINSIL WINSIZ WINXIT WINPLT WINFIX WINCHR WINSET WINDIS WINSUP WINSTS) (DSKIN (OPARRY.LAP) SYS: UTILS) (EXCISE) (RESTART]